home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / C / OTL-MCE.DMS / in.adf / MaxonC++ 3.1 < prev    next >
Encoding:
Text File  |  1996-04-25  |  5.1 KB  |  203 lines
  1. ; $VER: MaxonC++ V3.00.9 Install Version 3.1 (12.04.96)
  2. ; Script zum Installieren des Updates von MaxonC++ 3 auf Festplatte
  3. ;
  4.  
  5. (complete 0)
  6.  
  7. ; Die Versionsnummer und das Erstellungs-Datum der hier installierten
  8. ; C++ Version.
  9.  
  10. (set cpp-version "3.1")
  11.  
  12. ;====================================================================
  13. ; Einige Initialisierungen
  14. ;====================================================================
  15.  
  16. (set @default-dest "")
  17.  
  18. (set os-version (/ (getversion) 65536))
  19. (set os-13 (< os-version 36))
  20. (set os-20 (>= os-version 36))
  21. (set os-21 (>= os-version 38))
  22.  
  23. (set totalmem (database "total-mem")) ; Diese schöne Funktion vereinfacht einiges
  24.  
  25. ; Die Pfadnamen der Programme, die vom Installations-Skript aufgerufen werden.
  26.  
  27. (set run-lha                "RAM:LhX -a")
  28. (set run-replace             "MaxonC++_v3.1_Update:C/strrep ")
  29.  
  30. ; Die Pfadnamen der einzelnen Quell-Dateien.
  31.  
  32. (set source-muchmore                "MaxonC++_V3.1_Update:C/MuchMore")
  33. (set source-lhx                    "MaxonC++_V3.1_Update:c/LHX")
  34. (set source-readme                "MaxonC++_V3.1_Update:Bitte_lesen!")
  35. (set source-lib                    "MaxonC++_V3.1_Update:Lib")
  36. (set archive-compiler                "MaxonC++_V3.1_Update:compiler.lha")
  37. (set archive-editor                "MaxonC++_V3.1_Update:maxoned.lha")
  38.  
  39. ; Die benötigten Disketten
  40.  
  41. (set #prp-insert-disk1
  42.         (cat "\n\n\nBitte legen Sie nun die Diskette 1 \"MaxonC++_V3.1_Update\" "
  43.                  "in ein beliebiges Laufwerk ein!"))
  44.  
  45. (set #prp-copy-rct-lib
  46.     "Kopieren der RCT-Library")
  47. (set #hlp-copy-rct-lib
  48.     (cat    "Die RCT-Library beinhaltet den Standard-Filerequester "
  49.       "Wenn Sie diese Bibliothek schon auf Ihrer Festplatte "
  50.       "installiert haben, dann ist hier eine neuere Version.\n\n"))
  51. (set #wrk-create-pref-file
  52.     "\nDie Voreinstellungs-Datei wird erzeugt...")
  53.  
  54.  
  55. ;=====================================================================================
  56. ; Beginn der Installation
  57. ;=====================================================================================
  58.  
  59. ; Eine kleine Einleitungs-Message, gefolgt vom Startbildschirm des Installers.
  60.  
  61.  
  62. (message (cat    "\nWillkommen zum Installationsprogramm von \n\nMaxonC++ "
  63.                     "Update "cpp-version "!\n\n"
  64.                     "Dieses Skript kopiert die verschiedenen Dateien, "
  65.                     "aus denen sich das Update zusammensetzt, "
  66.                     "auf Ihre Festplatte.\n"
  67.                     "Es muß bereits eine alte Version des Compilers "
  68.                     "installiert sein!\n"))
  69.  
  70. (welcome)
  71.  
  72. (complete 5)
  73.  
  74. ;    Alte Version prüfen und entsprechende Warnung ausgeben! **************************************************************
  75.  
  76. (if (<> (getassign "MCPP") "") ; Da ist gar keine C++-Version installiert!
  77.     (
  78.  
  79.     (set destbin "MCPP:BIN")
  80.  
  81.     (if (exists "MCPP:BIN/MCPP_Light")
  82.         (
  83.         (set lightflag 1)
  84.         )
  85.         (
  86.         (set lightflag 0)
  87.         )
  88.     )
  89.  
  90.     (if lightflag
  91.         (message "Light-Version installiert!")
  92.     )
  93.  
  94.  
  95.  
  96.     ; Lhx wird in die RAM-Disk kopiert, damit das Programm nicht jedesmal von Disk
  97.     ; geladen werden muß.
  98.     (copyfiles
  99.         (source source-lhx)
  100.         (dest "RAM:")
  101.     )
  102. (complete 20)
  103.  
  104.         (working "\nKopieren der neuen Version des Compilers\n\n")
  105.           (run (cat run-lha " x " archive-compiler " " destbin"/"))
  106.  
  107.  
  108. (complete 50)
  109.  
  110.     (if lightflag
  111.         (
  112.         (delete (tackon destbin "MCPP_Light"))
  113.         (delete (tackon destbin "MCPP_Light.info"))
  114.         (rename (tackon destbin "MCPP3") (tackon destbin "MCPP_Light"))
  115.         (rename (tackon destbin "MCPP3.info") (tackon destbin "MCPP_Light.info"))
  116.         )
  117.     )
  118.  
  119.         (working "\nKopieren des neuen Editors\n\n")
  120.           (run (cat run-lha " x " archive-editor " " destbin"/"))
  121.  
  122.  
  123.  
  124. (complete 80)
  125.  
  126.         (copyfiles
  127.             (source source-readme)
  128.             (dest "MCPP:")
  129.         )
  130.  
  131.  
  132. (complete 90)
  133.  
  134.         (copyfiles
  135.             (source source-lib)
  136.             (pattern "#?")
  137.             (dest "MCPP:LIB")
  138.             (prompt    (cat    "\nKopiere veränderte Bibliotheken\n\n"
  139.                         "in das Verzeichnis MCPP:LIB\n\n "))
  140.             (help        @copyfiles-help)
  141.             (confirm)
  142.         )
  143.  
  144.         (set askflag
  145.         (askchoice
  146.             (prompt     "MaxonC++ enthält den neuen Editor 'MaxonED', der "
  147.                     "den bisherigen Editor 'Edward' ersetzt. "
  148.                     "Sie können nun wählen, ob Sie MaxonC++ in Zukunft mit "
  149.                     "MaxonED arbeiten oder Sie lieber weiterhin "
  150.                     "Edward benutzen möchten.\n"
  151.                     "Edward wird in keinem Fall gelöscht, so daß Sie bei "
  152.                     "Bedarf auch wieder Edward einbinden können (siehe Bitte_lesen!)"
  153.                     "\n")
  154.             (help "Kein Hilfstext verfügbar!")
  155.  
  156.             (choices "MaxonC++ mit MaxonED" "MaxonC++ wie bisher mit Edward")
  157.             (default 0)
  158.         )
  159.         )
  160.  
  161.         (if (= askflag 0)
  162.             (
  163.             (if (exists "s:mcpp.config")
  164.                 (
  165.                 (rename "s:mcpp.config" "s:mcpp.config.old")
  166.                 (run (cat run-replace "s:mcpp.config.old s:mcpp.config edward:edward MCPP:bin/MaxonED"))
  167.                 )
  168.             )
  169.  
  170.             (if (exists "MCPP:BIN/mcpp.SESSION")
  171.                 (
  172.                 (rename "mcpp:bin/mcpp.session" "mcpp:bin/mcpp.session.old")
  173.                 (run (cat run-replace "mcpp:bin/mcpp.session.old mcpp:bin/mcpp.session edward:edward MCPP:bin/MaxonED"))
  174.                 )
  175.             )
  176.  
  177.             )
  178.  
  179.  
  180.         )
  181.  
  182.     )
  183.  
  184.     (
  185.         ( abort (cat    "Das Update kann nur installiert werden, "
  186.                         "wenn sich bereits eine ältere, korrekt installierte "
  187.                         "Version auf Ihrem System befindet.\n\n"
  188.                         "Bitte installieren Sie zuerst von Ihren Original-Disketten."))
  189.  
  190.     )
  191. )
  192.  
  193. (complete 100)
  194.  
  195. ; ------- FERTIG
  196.  
  197. (message (cat
  198.     "Installation des MaxonC++ V3.1 Updates beendet.\n"
  199.    "Lesen Sie bitte die Datei readme.first im Verzeichnis MCPP:"
  200.    "\n\nViel Erfolg!")
  201. )
  202.  
  203.